home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / sftgrd / softgrid.bas < prev    next >
BASIC Source File  |  1995-01-08  |  2KB  |  54 lines
  1. ': VB-GRID.BAS
  2. '-    Driver for VB-GRID.FRM
  3. '
  4. ' Copyright 1994, AA-Software International
  5. '     Distributed for non-commercial educational use only.
  6. '     For other use contact:
  7. '        AA-Software International
  8. '        12 ter Domaine Du Bois Joli
  9. '        06330 Roquefort-Les-Pins, France
  10. '
  11. '        Tel: (+33) 93.77.50.47
  12. '        Fax: (+33) 93.77.19.78
  13. '        Internet: cswilly@acm.org
  14. '        CompuServe: 100343,2570
  15. '
  16. Option Explicit
  17.  
  18. Type testRecord
  19.    Zero As String
  20.    One As String
  21.    Two As String
  22.    Three As String
  23.    Four As String
  24.    Five As String
  25.    Six As String
  26.    Seven As String
  27.    Eight As String
  28.    Nine As String
  29.    Ten As String
  30. End Type
  31. Global Const testRecord_ut = "String, String, String, String, String, String, String, String, String, String, String"
  32.  
  33.       ' To perform this sort, you need the Registered version of AAVBSORT.DLL
  34.       ' The Shareware version AAVBSORT.DLL is available on:
  35.       '     CompuServe Forum: MSBASIC
  36.       '     Lib:  17
  37.       '     File: AASORT.ZIO
  38.       '
  39.       ' The file ORDER.TXT contains information on how to acquire the
  40.       ' registered version of AAVBSORT.DLL. You can also contact:
  41.       '
  42.       '     C.Scott Willy
  43.       '     Commercial Director
  44.       '     AA-Software International
  45.       '     12 ter Domaine Du Bois Joli
  46.       '     6330 Roquefort -Les - Pins, France
  47.       '
  48.       '     Tel: (+33) 93.77.50.47
  49.       '     Fax: (+33) 93.77.19.78
  50.       '     Internet: cswilly@acm.org
  51.       '     CompuServe: 100343,2570
  52. Declare Sub SortIdxTextRecord Lib "aavbsort.dll" Alias "SortIdxUserType" (array() As testRecord, ByVal typeDeclaration As String, intArray() As Integer, ByVal elementIndexToSortOn As Integer)
  53.  
  54.